1// Insert menu illustration scene 2// Author Friedrich A. Lohmueller, June-2012 3#version 3.7; 4global_settings{ assumed_gamma 1.0 } 5 6#default{ finish{ ambient 0.1 diffuse 0.9 }} 7#include "shapes.inc" 8#include "shapes2.inc" 9#include "colors.inc" 10#include "textures.inc" 11#include "glass.inc" 12 13#declare In_Path = "30 - Shapes2/" 14 15 // #declare Typ =51; // for tests 16 17#switch (Typ) //----------------------------------------------------------------------------- 18#case(10) #declare Txt_Path="10 - Wire_Box.txt" #break 19#case(11) #declare Txt_Path="11 - Round_Box.txt" #break 20#case(12) #declare Txt_Path="12 - Round_Cylinder.txt" #break 21#case(13) #declare Txt_Path="13 - Round_Cone.txt" #break 22#case(14) #declare Txt_Path="14 - Round_Cone2.txt" #break 23#case(15) #declare Txt_Path="15 - Round_Cone3.txt" #break 24 25#case(17) #declare Txt_Path="17 - Spheroid.txt" #break 26#case(19) #declare Txt_Path="19 - Supercone.txt" #break 27 28#case(20) #declare Txt_Path="20 - Hexagon.txt" #break 29#case(21) #declare Txt_Path="21 - Rhomboid.txt" #break 30#case(22) #declare Txt_Path="22 - Pyramid.txt" #break 31#case(23) #declare Txt_Path="23 - Pyramid2.txt" #break 32#case(24) #declare Txt_Path="24 - Tetrahedron.txt" #break 33#case(25) #declare Txt_Path="25 - Octahedron.txt" #break 34#case(26) #declare Txt_Path="26 - Dodecahedron.txt" #break 35#case(27) #declare Txt_Path="27 - Icosahedron.txt" #break 36 37#case(41) #declare Txt_Path="41 - Supertorus_1.txt" #break 38#case(42) #declare Txt_Path="42 - Supertorus_2.txt" #break 39#case(43) #declare Txt_Path="43 - Supertorus_3.txt" #break 40#case(44) #declare Txt_Path="44 - Supertorus_4.txt" #break 41 42#case(50) #declare Txt_Path="50 - superellipsoid_0.txt" #break 43#case(51) #declare Txt_Path="51 - superellipsoid_1.txt" #break 44#case(52) #declare Txt_Path="52 - superellipsoid_2.txt" #break 45#case(53) #declare Txt_Path="53 - superellipsoid_3.txt" #break 46#case(54) #declare Txt_Path="54 - superellipsoid_4.txt" #break 47#case(55) #declare Txt_Path="55 - superellipsoid_5.txt" #break 48 49#case(70) #declare Txt_Path="70 - Paraboloid_X.txt" #break 50#case(71) #declare Txt_Path="71 - Paraboloid_Y.txt" #break 51#case(72) #declare Txt_Path="72 - Paraboloid_Z.txt" #break 52 53#case(75) #declare Txt_Path="75 - Hyperboloid.txt" #break 54#case(76) #declare Txt_Path="76 - Hyperboloid_Y.txt" #break 55#case(77) #declare Txt_Path="77 - Hyperboloid_Z.txt" #break 56#end 57// ------------------------------------------------------------------------------------------- 58// -------- 59// #include concat(In_Path,Txt_Path) 60 61// --------------------------- 62//------------------------------ the Axes -------------------------------- 63//------------------------------------------------------------------------ 64#macro Axis_( AxisLen, Dark_Texture,Light_Texture) 65 union{ 66 cylinder { <0,-AxisLen,0>,<0,AxisLen,0>,0.05 67 texture{checker texture{Dark_Texture } 68 texture{Light_Texture} 69 translate<0.1,0,0.1>} 70 } 71 cone{<0,AxisLen,0>,0.2,<0,AxisLen+0.7,0>,0 72 texture{Dark_Texture} 73 } 74 } // end of union 75#end // of macro "Axis()" 76//------------------------------------------------------------------------ 77#macro AxisXYZ_( AxisLenX, AxisLenY, AxisLenZ, Tex_Dark, Tex_Light, 78 Rot_X,Rot_Y, ScaleX,ScaleY,ScaleZ) 79//--------------------- drawing of 3 Axes -------------------------------- 80 81union{ 82#if (AxisLenX != 0) 83 object { Axis_(AxisLenX, Tex_Dark, Tex_Light) rotate< 0,0,-90>}// x-Axis 84 text { ttf "arial.ttf", "x", 0.15, 0 texture{Tex_Dark} 85 rotate<Rot_X,Rot_Y,0> scale ScaleX translate <AxisLenX+0.05,0.4,-0.10> no_shadow} 86#end // of #if 87#if (AxisLenY != 0) 88 object { Axis_(AxisLenY, Tex_Dark, Tex_Light) rotate< 0,0, 0>}// y-Axis 89 text { ttf "arial.ttf", "y", 0.15, 0 texture{Tex_Dark} 90 rotate<Rot_X,0,0> scale ScaleY translate <-0.55,AxisLenY+0.15,-0.20> rotate<0,Rot_Y,0> no_shadow} 91#end // of #if 92#if (AxisLenZ != 0) 93 object { Axis_(AxisLenZ, Tex_Dark, Tex_Light) rotate<90,0, 0>}// z-Axis 94 text { ttf "arial.ttf", "z", 0.15, 0 texture{Tex_Dark} 95 rotate<Rot_X,Rot_Y,0> scale ScaleZ translate <-0.35,0.3,AxisLenZ+0.10> no_shadow} 96#end // of #if 97} // end of union 98#end// of macro "AxisXYZ( ... )" 99//------------------------------------------------------------------------ 100#declare T_Dark = 101texture { 102 pigment{ color rgb<1,0.55,0>} 103 finish { phong 1} 104} 105#declare T_Light = 106texture { 107 pigment{ color rgb<1,1,1>} 108 finish { phong 1} 109} 110 111//-------------------------------------------------- end of coordinate axes 112//---------------------------------<<< settings of squared plane dimensions 113#declare RasterScale = 1.0; 114#declare RasterHalfLine = 0.025; 115#declare RasterHalfLineZ = 0.025; 116//------------------------------------------------------------------------- 117#macro Raster(RScale, HLine) 118 pigment{ gradient x scale RScale 119 color_map{[0.000 color rgbt<1,1,1,0>*0.6] 120 [0+HLine color rgbt<1,1,1,0>*0.6] 121 [0+HLine color rgbt<1,1,1,1>] 122 [1-HLine color rgbt<1,1,1,1>] 123 [1-HLine color rgbt<1,1,1,0>*0.6] 124 [1.000 color rgbt<1,1,1,0>*0.6]} } 125 #end// of Raster(RScale, HLine)-macro 126//------------------------------------------------------------------------- 127#declare Ground_1 = 128plane { <0,1,0>, 0 // plane with layered textures 129 texture { pigment{color rgb<1,1,1>*1.1} 130 finish {ambient 0.45 diffuse 0.85}} 131 texture { Raster(RasterScale,RasterHalfLine ) rotate<0,0,0> } 132 texture { Raster(RasterScale,RasterHalfLineZ) rotate<0,90,0>} 133 translate<0,0.001,0> 134 } 135//------------------------------------------------------------------------- 136#declare RasterScale = 1.0; 137#declare RasterHalfLine = 0.015; 138#declare RasterHalfLineZ = 0.025; 139//------------------------------------------------------------------------- 140#macro Raster(RScale, HLine) 141 pigment{ gradient x scale RScale 142 color_map{[0.000 color rgbt<1,1,1,0>*1.1] 143 [0+HLine color rgbt<1,1,1,0>*1.1] 144 [0+HLine color rgbt<1,1,1,1>] 145 [1-HLine color rgbt<1,1,1,1>] 146 [1-HLine color rgbt<1,1,1,0>*1.1] 147 [1.000 color rgbt<1,1,1,0>*1.1]} } 148 #end// of Raster(RScale, HLine)-macro 149 150#declare Ground_2 = 151plane { <0,1,0>, 0 // plane with layered textures 152 texture { pigment{color rgb<1,1,1>*0.1 } } 153 texture { Raster(RasterScale,RasterHalfLine ) rotate<0,0,0> } 154 texture { Raster(RasterScale,RasterHalfLineZ) rotate<0,90,0>} 155 translate<0,0.001,0> 156 } 157//------------------------------------------------ end of squared plane XZ 158 159 160 161 162//----------------------------------------------- macro "Vector(Start,End,Radius)"! 163#macro Vector(P_start,P_end, R_Vector) 164union{ 165 166cylinder{ P_start, P_end - ( vnormalize(P_end - P_start)*9.5*R_Vector), R_Vector } 167cone { P_end - ( vnormalize(P_end - P_start)*10*R_Vector), 3*R_Vector, P_end, 0 } 168}// end of union 169#end //-------------------------------------------------------------------------- end of macro 170 171//----------------------------------------------- macro "Distance_Marker(Start,End,Radius)"! 172#macro Distance_Marker(P_start,P_end, R_Vector) 173union{ 174 175cylinder{ P_start + ( vnormalize(P_end - P_start)*9.5*R_Vector), 176 P_end - ( vnormalize(P_end - P_start)*9.5*R_Vector), R_Vector } 177cone { P_end - ( vnormalize(P_end - P_start)*10*R_Vector), 3*R_Vector, P_end, 0 } 178cone { P_start + ( vnormalize(P_end - P_start)*10*R_Vector), 3*R_Vector, P_start, 0 } 179}// end of union 180#end //-------------------------------------------------------------------------- end of macro 181// sky ------------------------------------------------------------------- 182#macro MySky (Turn) 183sky_sphere{ pigment{ gradient <0,1,0> 184 color_map{ [0 color rgb<1,1,1> ]//White 185 [0.5 color rgb<0.24,0.34,0.56>*0.7]//~Navy 186 [0.5 color rgb<0.24,0.34,0.56>*0.7]//~Navy 187 [1.0 color rgb<1,1,1> ]//White 188 } 189 190 #if(Turn=1)rotate<-50,0,-50> #end 191 #if(Turn=2)rotate< 50,110,0> #end 192 scale 2 } 193 } // end of sky_sphere 194#end // of macro 195//------------------------------------------------------------------------ 196// ----------------------------------------------- 197#declare T_Orange = 198texture{ pigment{ color rgb<1.00,0.65,0.15>} 199 finish { phong 1 } 200 } // end of texture 201#declare T_DarkRed = 202texture{ pigment{ color rgb<1,0,0>*0.3 } 203 finish { phong 0.1 } 204 } // end of texture 205#declare T_Red = 206texture{ pigment{ color rgb<1,0,0> } 207 finish { phong 0.1 } 208 } // end of texture 209// --------------------------- 210// --------------------------- 211// --------------------------- 212// --------------------------- 213// --------------------------- 214 215 216 217 218 219//------------------------------------------------------------------------------------ 220 221 222#if (Typ=10) 223MySky (2) 224camera{ angle 30 location < 4.50, 3.00, -4.50> look_at< 0.10, 0.65, 0.00>} 225light_source{<2500, 2500, 0> color rgb<1,1,1>*0.8} // sun light 226light_source{<4.50, 3.00,-4.50> color rgb<0.9,0.9,1>*0.1} // flash light 227object{ AxisXYZ_( 3.55, 3.25, 5.5, T_Dark, T_Light,30,-45, 0.75,0.75,1.05) scale 0.5} 228union{ 229sphere { <1,1,1>, 0.065 230 texture{ T_Red } no_shadow 231 } // end of sphere ------------------------------- 232sphere { <-1,0,-1>, 0.065 233 texture{ T_Red } no_shadow 234 } // end of sphere ------------------------------- 235object { // Wire_Box(A, B, WireRadius, UseMerge) 236 Wire_Box(<-1,0,-1>,<1,1,1>, 0.015 , 0) 237 texture{ pigment{ color rgb<1,1,1>*1.1}} 238 scale<1,1,1> rotate<0, 0,0> translate<0,0.0,0> 239 } // --------------------------------------------- 240translate<0,0.1,0> 241}// end union 242#include concat(In_Path,Txt_Path) // 10 - Wire_Box.txt" 243#end 244 245#if (Typ=11) 246MySky (2) 247camera{ angle 30 location < 4.50, 3.00, -4.50> look_at< 0.10, 0.65, 0.00>} 248light_source{<2500, 2500, 0> color rgb<1,1,1>*0.8} // sun light 249light_source{<4.50, 3.00,-4.50> color rgb<0.9,0.9,1>*0.1} // flash light 250object{ AxisXYZ_( 3.25, 3.25, 6.1, T_Dark, T_Light,30,-45, 0.75,0.75,1.05) scale 0.5} 251union{ 252sphere { <1,1,1>, 0.045 253 texture{ T_Red } no_shadow 254 } // end of sphere ------------------------------- 255sphere { <-1,0,-1>, 0.045 256 texture{ T_Red } no_shadow 257 } // end of sphere ------------------------------- 258object { // Wire_Box(A, B, WireRadius, UseMerge) 259 Wire_Box(<-1,0,-1>,<1,1,1>, 0.015 , 0) 260 texture{ pigment{ color rgb<1,1,1>*1.1} } 261 262 } // --------------------------------------------- 263translate<0,0.1,0> 264}// end union 265#include concat(In_Path,Txt_Path) // 11 - Round_Box.txt" 266#end 267 268#if (Typ=12) 269MySky (2) 270camera{ angle 28 location < 4.50, 4.00, -4.50> look_at< 0.10, 0.80, 0.00>} 271light_source{<2500, 2500, 0> color rgb<1,1,1>*0.8} // sun light 272light_source{<4.50, 4.00,-4.50> color rgb<0.9,0.9,1>*0.1} // flash light 273object{ AxisXYZ_( 2.15, 3.55, 4.5, T_Dark, T_Light,30,-45, 0.75,0.75,1.05) scale 0.5} 274 275sphere { <0,0,0>, 0.045 276 texture{ T_Red } no_shadow 277 } // end of sphere ------------------------------- 278sphere { <0,1.5,0>, 0.045 279 texture{ T_Red } no_shadow 280 } // end of sphere ------------------------------- 281torus{0.50,0.01 translate<0,0,0> texture{ pigment{ color rgb<1,1,1>*1.1}} } 282torus{0.50,0.01 translate<0,1.5,0> texture{ pigment{ color rgb<1,1,1>*1.1}} } 283//------------------------------------------------------------------------------------ 284object{ Vector( <0,0,0>,<0.50,0,0>, 0.02) pigment{ color rgb< 0.8,0.0,0.0> } 285 rotate<0,-30,0> translate<0,1.50,0> no_shadow } 286object{ Vector( <0,0,0>,<0.50,0,0>, 0.02) pigment{ color rgb< 0.8,0.0,0.0> } 287 rotate<0,-30,0> translate<0,0.00,0> no_shadow } 288//------------------------------------------------------------------------------------ 289 290#include concat(In_Path,Txt_Path) // 12 - Round_Cylinder.txt" 291#end 292 293#if (Typ=13) 294MySky (2) 295camera{ angle 25 location < 4.50, 3.00, -4.50> look_at< 0.10, 0.70, 0.00>} 296light_source{<2500, 2500, 0> color rgb<1,1,1>*0.8} // sun light 297light_source{<4.50, 3.00,-4.50> color rgb<0.9,0.9,1>*0.1} // flash light 298object{ AxisXYZ_( 2.15, 2.95, 4.5, T_Dark, T_Light,30,-45, 0.75,0.75,1.05) scale 0.5} 299sphere { <0,1.20,0>, 0.045 texture{ T_Red } no_shadow } 300torus{0.70,0.01 translate<0,0,0> texture{ pigment{ color rgb<1,1,1>*1.1}} } 301torus{0.40,0.01 translate<0,1.20,0> texture{ pigment{ color rgb<1,1,1>*1.1}} } 302//------------------------------------------------------------------------------------ 303object{ Vector( <0,0,0>,<0.70,0,0>, 0.02) pigment{ color rgb< 0.8,0.0,0.0> } 304 rotate<0,-25,0> translate<0,0.00,0> no_shadow } 305object{ Vector( <0,0,0>,<0.40,0,0>, 0.02) pigment{ color rgb< 0.8,0.0,0.0> } 306 rotate<0,-25,0> translate<0,1.20,0> no_shadow } 307//------------------------------------------------------------------------------------ 308#include concat(In_Path,Txt_Path) // 13 - Round_Cone.txt" 309#end 310#if (Typ=14) 311MySky (2) 312camera{ angle 30 location < 4.50, 3.00, -4.50> look_at< 0.10, 0.50, 0.00>} 313light_source{<-1500, 2500, 0> color rgb<1,1,1>*0.8} // sun light 314light_source{< 4.50, 3.00,-4.50> color rgb<0.9,0.9,1>*0.1} // flash light 315object{ AxisXYZ_( 3.55, 2.95, 5.5, T_Dark, T_Light,30,-45, 0.75,0.75,1.05) scale 0.5} 316sphere { <0,0.00,0>, 0.045 texture{ T_Red } no_shadow } 317sphere { <0,1.00,0>, 0.045 texture{ T_Red } no_shadow } 318//------------------------------------------------------------------------------------ 319object{ Vector( <0,0,0>,<0.70,0,0>, 0.02) pigment{ color rgb< 0.8,0.0,0.0> } 320 rotate<0,-25,0> translate<0,0.00,0> no_shadow } 321object{ Vector( <0,0,0>,<0.40,0,0>, 0.02) pigment{ color rgb< 0.8,0.0,0.0> } 322 rotate<0,-25,0> translate<0,1.00,0> no_shadow } 323torus{0.70,0.02 translate<0,0,0> texture{ pigment{ color rgb<1,1,1>*1.1}} } 324torus{0.40,0.02 translate<0,1.00,0> texture{ pigment{ color rgb<1,1,1>*1.1}} } 325//------------------------------------------------------------------------------------ 326#include concat(In_Path,Txt_Path) // 14 - Round_Cone2.txt" 327#end 328#if (Typ=15) 329MySky (2) 330camera{ angle 30 location < 4.50, 3.00,-4.50> look_at< 0.10, 0.20, 0.00>} 331light_source{<-1500, 2500, 0> color rgb<1,1,1>*0.8} // sun light 332light_source{ < 4.50, 3.00,-4.50> color rgb<0.9,0.9,1>*0.1} // flash light 333object{ AxisXYZ_( 3.15, 2.35, 4.5, T_Dark, T_Light,30,-45, 0.75,0.75,1.05) scale 0.5} 334sphere { <0,0.00,0>, 0.045 texture{ T_Red } no_shadow } 335sphere { <0,1.00,0>, 0.045 texture{ T_Red } no_shadow } 336//------------------------------------------------------------------------------------ 337object{ Vector( <0,0,0>,<0.70,0,0>, 0.02) pigment{ color rgb< 0.8,0.0,0.0> } 338 rotate<0,-25,0> translate<0,0.00,0> no_shadow } 339object{ Vector( <0,0,0>,<0.40,0,0>, 0.02) pigment{ color rgb< 0.8,0.0,0.0> } 340 rotate<0,-25,0> translate<0,0.800,0> no_shadow } 341torus{0.70,0.02 translate<0,0,0> texture{ pigment{ color rgb<1,1,1>*1.1}} } 342torus{0.40,0.02 translate<0,0.80,0> texture{ pigment{ color rgb<1,1,1>*1.1}} } 343#include concat(In_Path,Txt_Path) // 15 - Round_Cone3.txt" 344#end 345 346#if (Typ=17) 347MySky (1) 348camera{ angle 45 location < 5.50, 4.00, -6.50> look_at<-1.80, 1.00, -0.80>} 349light_source{< 1000, 1000,-1500> color rgb<1,1,1>*0.8} // sun light 350light_source{< 5.50, 4.00,-6.50> color rgb<0.9,0.9,1>*0.1} // flash light 351object{ AxisXYZ_( 1.5, 3.00, 2.5, T_Dark, T_Light,30,-45, 0.65,0.65,0.85) scale 1} 352sphere { <-1.50,2.00,-2.00>, 0.065 texture{ pigment{ color rgb< 0,1,1> } } no_shadow } 353//------------------------------------------------------------------------------------ 354object{ Vector( <0,0,0>,<-1.50,2.00,-2.00>, 0.04) pigment{ color rgb< 0,1,1> } 355 rotate<0,0,0> translate<0,0.00,0> no_shadow } 356object{ Vector( <0,0,0>,<2.0,0,0>, 0.03) pigment{ color rgb< 0.8,0.0,0.0> } 357 rotate<0,0,0> translate<-1.50,2.00,-2.00> no_shadow } 358object{ Vector( <0,0,0>,<0,1.2,0>, 0.03) pigment{ color rgb< 0.8,0.0,0.0> } 359 rotate<0,0,0> translate<-1.50,2.00,-2.00> no_shadow } 360object{ Vector( <0,0,0>,<0,0,2.5>, 0.03) pigment{ color rgb< 0.8,0.0,0.0> } 361 rotate<0,0,0> translate<-1.50,2.00,-2.00> no_shadow } 362torus{2.5,0.02 scale<2/2.5,1,1> translate<-1.50,2.00,-2.00> texture{ pigment{ color rgb<1,1,1>*1.1}} } 363torus{2,0.02 rotate<90,0,0> scale<1,1.2/2,1> translate<-1.50,2.00,-2.00> texture{ pigment{ color rgb<1,1,1>*1.1}} } 364torus{2.5,0.02 rotate<0,0,90>scale<1,1.2/2.5,1> translate<-1.50,2.00,-2.00> texture{ pigment{ color rgb<1,1,1>*1.1}} } 365// Spheroid(<-1.50,2.00,-2.00>, <2.0,1.2,2.5> )// CenterVector, RadiusVector Rx,Ry,Rz ) 366#include concat(In_Path,Txt_Path) // 17 - Spheroid.txt" 367#end 368#if (Typ=19) 369MySky (1) 370camera{ angle 30 location < 4.50, 4.00, -3.50> look_at< 0.10, 0.95, 0.00>} 371light_source{< 1500, 2500,-2500> color rgb<1,1,1>*0.8} // sun light 372light_source{< 4.50, 4.00,-3.50> color rgb<0.9,0.9,1>*0.1} // flash light 373object{ AxisXYZ_( 1.55, 3.75, 3.85, T_Dark, T_Light,20,-45, 0.75,0.75,1.05) scale 0.5} 374sphere { <0,0.00,0>, 0.055 texture{ T_Red } no_shadow } 375sphere { <0,1.7,0.00>, 0.055 texture{ T_Red } no_shadow } 376//------------------------------------------------------------------------------------ 377object{ Vector( <0,0,0>,<0.5,0,0>, 0.03) pigment{ color rgb< 0.8,0.0,0.0> } 378 translate<0,0.00,0> no_shadow } 379object{ Vector( <0,0,0>,<0,0,1.0>, 0.03) pigment{ color rgb< 0.8,0.0,0.0> } 380 translate<0,0.00,0> no_shadow } 381//------------------------------------------------------------------------------------ 382object{ Vector( <0,0,0>,<0.7,0,0>, 0.025) pigment{ color rgb< 0.8,0.0,0.0> } 383 translate<0,1.70,0> no_shadow } 384object{ Vector( <0,0,0>,<0,0,0.3>, 0.025) pigment{ color rgb< 0.8,0.0,0.0> } 385 translate<0,1.70,0> no_shadow } 386//Supercone(<0.00,0.00,0.00>, 0.5, 1.0, // point A, axis Ax, axis Az, 387// <0.00,1.70,0.00>, 0.7, 0.3) // point B, axis Bx, axis Bz) 388#include concat(In_Path,Txt_Path) // 19 - Supercone.txt" 389#end 390 391 392 393 394// -------- 395#if (Typ=20) 396MySky (1) 397camera{ angle 62 location < 2.50, 1.50, -2.50> look_at< 0.00, 0.10, 0.00>} 398light_source{<1500,2500,-1000> color rgb<1,1,1>*0.9} // sun light 399light_source{<2.50,1.50,-2.50> color rgb<0.9,0.9,1>*0.1} // flash light 400object{ AxisXYZ_( 3.15, 2.65, 9, T_Dark, T_Light,10,-55, 0.75,0.75,1.25) scale 0.5} 401#include concat(In_Path,Txt_Path) // 20 - Hexagon.txt" 402#end 403// -------- 404#if (Typ=21) 405MySky (1) 406camera{ angle 35 location < 4.50, 3.00, -4.50> look_at< 0.30, 0.15, 0.00>} 407light_source{<1500,2500,-1000> color rgb<1,1,1>*0.9} // sun light 408light_source{<4.50,3.00,-4.50> color rgb<0.9,0.9,1>*0.1} // flash light 409object{ AxisXYZ_( 3.35, 2.65, 8, T_Dark, T_Light,10,-55, 0.75,0.75,1.25) scale 0.5} 410#include concat(In_Path,Txt_Path) // 21 - Rhomboid.txt" 411#end 412// -------- 413#if (Typ=22) 414MySky (1) 415camera{ angle 34 location < 4.50, 3.00, -4.50> look_at< 0.10,-0.10, 0.00>} 416light_source{<1500,2500,-1000> color rgb<1,1,1>*0.9} // sun light 417light_source{<4.50,3.00,-4.50> color rgb<0.9,0.9,1>*0.1} // flash light 418object{ AxisXYZ_( 3.15, 2.25, 3, T_Dark, T_Light,10,-55, 0.75,0.75,1.25) scale 0.5} 419#include concat(In_Path,Txt_Path) // 22 - Pyramid.txt" 420#end 421// -------- 422#if (Typ=23) 423MySky (1) 424camera{ angle 38 location < 4.50, 3.00, -4.50> look_at< 0.10, 0.50, 0.00>} 425light_source{< 1500,2500,-1000> color rgb<1,1,1>*0.9} // sun light 426light_source{< 4.50,3.00,-4.50> color rgb<0.9,0.9,1>*0.1} // flash light 427object{ AxisXYZ_( 4.05, 3.65, 6.5, T_Dark, T_Light,10,-55, 0.75,0.75,1.05) scale 0.5} 428#include concat(In_Path,Txt_Path) // 23 - Pyramid2.txt" 429#end 430// -------- 431 432 433#if (Typ=24) 434MySky (1) 435camera{ angle 36 location < 4.50, 3.00, -4.50> look_at< 0.10, 0.45, 0.00>} 436light_source{< 1500,2500,-1000> color rgb<1,1,1>*0.9} // sun light 437light_source{< 4.50,3.00,-4.50> color rgb<0.9,0.9,1>*0.1} // flash light 438object{ AxisXYZ_( 3.55, 3.55, 5.5, T_Dark, T_Light,10,-55, 0.75,0.75,1.05) scale 0.5} 439#include concat(In_Path,Txt_Path) // 24 - Tetrahedron.txt" 440#end 441#if (Typ=25) 442MySky (1) 443camera{ angle 39 location < 4.50, 3.00, -4.50> look_at< 0.10, 0.40, 0.00>} 444light_source{< 1500,2500,-1000> color rgb<1,1,1>*0.9} // sun light 445light_source{< 4.50,3.00,-4.50> color rgb<0.9,0.9,1>*0.1} // flash light3 446object{ AxisXYZ_( 3.35, 3.55, 5.5, T_Dark, T_Light,10,-55, 0.75,0.75,1.05) scale 0.5} 447#include concat(In_Path,Txt_Path) // 25 - Octahedron.txt" 448#end 449#if (Typ=26) 450MySky (1) 451camera{ angle 35 location < 4.50, 3.00, -4.50> look_at< 0.10, 0.20, 0.00>} 452light_source{< 1500,2500,-1000> color rgb<1,1,1>*0.9} // sun light 453light_source{< 4.50,3.00,-4.50> color rgb<0.9,0.9,1>*0.1} // flash light 454object{ AxisXYZ_( 3.15, 2.65, 5.5, T_Dark, T_Light,10,-45, 0.75,0.75,1.05) scale 0.5} 455#include concat(In_Path,Txt_Path) // 26 - Dodecahedron.txt" 456#end 457#if (Typ=27) 458MySky (2) 459camera{ angle 33 location < 4.50, 3.00, -4.50> look_at< 0.10, 0.35, 0.00>} 460light_source{<2500, 2500,-0000> color rgb<1,1,1>*0.8} // sun light 461light_source{<4.50, 3.00,-4.50> color rgb<0.9,0.9,1>*0.1} // flash light 462object{ AxisXYZ_( 3.25, 2.95, 5.5, T_Dark, T_Light,30,-45, 0.75,0.75,1.05) scale 0.5} 463#include concat(In_Path,Txt_Path) // 27 - Icosahedron.txt" 464#end 465 466#if (Typ=41) 467MySky (1) 468camera{ angle 30 location < 4.50, 3.00, -4.50> look_at< 0.10, 0.20, 0.00>} 469light_source{<-1500, 2500,-2500> color rgb<1,1,1>*0.8} // sun light 470light_source{< 4.50, 3.00,-4.50> color rgb<0.9,0.9,1>*0.1} // flash light 471object{ AxisXYZ_( 3.15, 2.35, 4.5, T_Dark, T_Light,30,-45, 0.75,0.75,1.05) scale 0.5} 472#include concat(In_Path,Txt_Path) // 41 - Supertorus_1.txt" 473#end 474#if (Typ=42) 475MySky (1) 476camera{ angle 30 location < 4.50, 3.00, -4.50> look_at< 0.10, 0.20, 0.00>} 477light_source{<-1500, 2500,-2500> color rgb<1,1,1>*0.8} // sun light 478light_source{< 4.50, 3.00,-4.50> color rgb<0.9,0.9,1>*0.1} // flash light 479object{ AxisXYZ_( 3.15, 2.35, 4.5, T_Dark, T_Light,30,-45, 0.75,0.75,1.05) scale 0.5} 480#include concat(In_Path,Txt_Path) // 42 - Supertorus_2.txt" 481#end 482#if (Typ=43) 483MySky (1) 484camera{ angle 30 location < 4.50, 3.00, -4.50> look_at< 0.10, 0.20 0.00>} 485light_source{<-1500, 2500,-2500> color rgb<1,1,1>*0.8} // sun light 486light_source{< 4.50, 3.00,-4.50> color rgb<0.9,0.9,1>*0.1} // flash light 487object{ AxisXYZ_( 3.15, 2.35, 4.5, T_Dark, T_Light,30,-45, 0.75,0.75,1.05) scale 0.5} 488#include concat(In_Path,Txt_Path) // 43 - Supertorus_3.txt" 489#end 490#if (Typ=44) 491MySky (1) 492camera{ angle 30 location < 4.50, 3.00, -4.50> look_at< 0.10, 0.20, 0.00>} 493light_source{<-1500, 2500,-2500> color rgb<1,1,1>*0.8} // sun light 494light_source{< 4.50, 3.00,-4.50> color rgb<0.9,0.9,1>*0.1} // flash light 495object{ AxisXYZ_( 3.15, 2.35, 4.5, T_Dark, T_Light,30,-45, 0.75,0.75,1.05) scale 0.5} 496#include concat(In_Path,Txt_Path) // 44 - Supertorus_4.txt" 497#end 498 499 500 501#if (Typ=50) 502MySky (1) 503camera{ angle 35 location < 4.50, 3.00, -4.50> look_at< 0.10, 0.00, 0.00>} 504light_source{<-1500, 2500,-2500> color rgb<1,1,1>*0.8} // sun light 505light_source{< 4.50, 3.00,-4.50> color rgb<0.9,0.9,1>*0.1} // flash light 506object{ AxisXYZ_( 3.15, 2.45, 4.5, T_Dark, T_Light,30,-45, 0.75,0.75,1.05) scale 0.5} 507object{ Wire_Box(<-1,-1,-1>,<1,1,1>, 0.015, 0) texture{ pigment{ color rgb<1,1,1>*1.1}} } 508#include concat(In_Path,Txt_Path) // 50 - superellipsoid_0.txt" 509#end 510#if (Typ=51) 511MySky (1) 512camera{ angle 35 location < 4.50, 3.00, -4.50> look_at< 0.10, 0.00, 0.00>} 513light_source{<-1500, 2500,-2500> color rgb<1,1,1>*0.8} // sun light 514light_source{< 4.50, 3.00,-4.50> color rgb<0.9,0.9,1>*0.1} // flash light 515object{ AxisXYZ_( 3.15, 2.45, 4.5, T_Dark, T_Light,30,-45, 0.75,0.75,1.05) scale 0.5} 516object{ Wire_Box(<-1,-1,-1>,<1,1,1>, 0.015, 0) texture{ pigment{ color rgb<1,1,1>*1.1}} } 517#include concat(In_Path,Txt_Path) // 51 - superellipsoid_1.txt" 518#end 519#if (Typ=52) 520MySky (1) 521camera{ angle 35 location < 4.50, 3.00, -4.50> look_at< 0.10, 0.00, 0.00>} 522light_source{<-1500, 2500,-2500> color rgb<1,1,1>*0.8} // sun light 523light_source{< 4.50, 3.00,-4.50> color rgb<0.9,0.9,1>*0.1} // flash light 524object{ AxisXYZ_( 3.15, 2.45, 4.5, T_Dark, T_Light,30,-45, 0.75,0.75,1.05) scale 0.5} 525object{ Wire_Box(<-1,-1,-1>,<1,1,1>, 0.015, 0) texture{ pigment{ color rgb<1,1,1>*1.1}} } 526#include concat(In_Path,Txt_Path) // 52 - superellipsoid_2.txt" 527#end 528#if (Typ=53) 529MySky (1) 530camera{ angle 35 location < 4.50, 3.00, -4.50> look_at< 0.10, 0.00, 0.00>} 531light_source{<-1500, 2500,-2500> color rgb<1,1,1>*0.8} // sun light 532light_source{< 4.50, 3.00,-4.50> color rgb<0.9,0.9,1>*0.1} // flash light 533object{ AxisXYZ_( 3.15, 2.45, 4.5, T_Dark, T_Light,30,-45, 0.75,0.75,1.05) scale 0.5} 534object { Wire_Box(<-1,-1,-1>,<1,1,1>, 0.015, 0) texture{ pigment{ color rgb<1,1,1>*1.1}} } 535#include concat(In_Path,Txt_Path) // 53 - superellipsoid_3.txt" 536#end 537#if (Typ=54) 538MySky (1) 539camera{ angle 35 location < 4.50, 3.00, -4.50> look_at< 0.10, 0.00, 0.00>} 540light_source{<-1500, 2500,-2500> color rgb<1,1,1>*0.8} // sun light 541light_source{< 4.50, 3.00,-4.50> color rgb<0.9,0.9,1>*0.1} // flash light 542object{ AxisXYZ_( 3.15, 2.45, 4.5, T_Dark, T_Light,30,-45, 0.75,0.75,1.05) scale 0.5} 543object{ Wire_Box(<-1,-1,-1>,<1,1,1>, 0.015, 0) texture{ pigment{ color rgb<1,1,1>*1.1}} } 544#include concat(In_Path,Txt_Path) // 54 - superellipsoid_4.txt" 545#end 546#if (Typ=55) 547MySky (1) 548camera{ angle 35 location < 4.50, 3.00, -4.50> look_at< 0.10, 0.00, 0.00>} 549light_source{<-1500, 2500,-2500> color rgb<1,1,1>*0.8} // sun light 550light_source{< 4.50, 3.00,-4.50> color rgb<0.9,0.9,1>*0.1} // flash light 551object{ AxisXYZ_( 3.15, 2.45, 4.5, T_Dark, T_Light,30,-45, 0.75,0.75,1.05) scale 0.5} 552object{ Wire_Box(<-1,-1,-1>,<1,1,1>, 0.015, 0) texture{ pigment{ color rgb<1,1,1>*1.1}} } 553#include concat(In_Path,Txt_Path) // 55 - superellipsoid_5.txt" 554#end 555 556 557 558 559 560#if (Typ=70) 561MySky (1) 562camera{ angle 38 location < 4.50, 3.00, -4.50> look_at< 1.00,-0.06, 0.00>} 563light_source{< 1500, 2500,-2500> color rgb<1,1,1>*0.8} // sun light 564light_source{< 4.50, 3.00,-4.50> color rgb<0.9,0.9,1>*0.1} // flash light 565object{ AxisXYZ_( 5.25, 2.15, 6.5, T_Dark, T_Light,20,-45, 0.75,0.75,1.05) scale 0.5} 566object{ Wire_Box(<0,-2,-2>,<4.0, 2,2>, 0.03, 0) scale 0.5 texture{ pigment{ color rgb<1,1,1>*1.1}} } 567#include concat(In_Path,Txt_Path) // 70 - Paraboloid_X.txt" 568#end 569#if (Typ=71) 570MySky (1) 571camera{ angle 36 location < 4.50, 3.00, -4.50> look_at< 0.10, 1.00, 0.00>} 572light_source{<-1500, 2500,-2500> color rgb<1,1,1>*0.8} // sun light 573light_source{< 4.50, 3.00,-4.50> color rgb<0.9,0.9,1>*0.1} // flash light 574object{ AxisXYZ_( 2.85, 4.45, 6.75, T_Dark, T_Light,30,-45, 0.75,0.75,1.05) scale 0.5} 575object{ Wire_Box(<-2,0,-2>,<2, 4.00,2>, 0.03, 0) scale 0.5 texture{ pigment{ color rgb<1,1,1>*1.1}} } 576#include concat(In_Path,Txt_Path) // 71 - Paraboloid_Y.txt" 577#end 578#if (Typ=72) 579MySky (1) 580camera{ angle 31 location < 4.50, 3.00, -4.50> look_at< 0.10,-0.10, 1.00>} 581light_source{<-1500, 2500,-2500> color rgb<1,1,1>*0.8} // sun light 582light_source{< 4.50, 3.00,-4.50> color rgb<0.9,0.9,1>*0.1} // flash light 583object{ AxisXYZ_( 3.15, 2.45, 9.5, T_Dark, T_Light,30,-45, 0.75,0.75,1.05) scale 0.5} 584object{ Wire_Box(<-2,-2,0>,<2,2, 4.00>, 0.03, 0) scale 0.5 texture{ pigment{ color rgb<1,1,1>*1.1}} } 585#include concat(In_Path,Txt_Path) // 72 - Paraboloid_Z.txt" 586#end 587#if (Typ=75) 588MySky (1) 589camera{ angle 36 location < 4.50, 3.00, -4.50> look_at< 0.10, 0.75, 0.00>} 590light_source{<-1500, 2500,-2500> color rgb<1,1,1>*0.8} // sun light 591light_source{< 4.50, 3.00,-4.50> color rgb<0.9,0.9,1>*0.1} // flash light 592object{ AxisXYZ_( 3.55, 2.45, 7.5, T_Dark, T_Light,30,-45, 0.75,0.75,1.05) scale 0.5} 593object{ Wire_Box(<-2.0, 0.0,-3.0>,<2.0, 4.0,3.0>, 0.03, 0) scale 0.5 texture{ pigment{ color rgb<1,1,1>*1.1}} } 594#include concat(In_Path,Txt_Path) // 75 - Hyperboloid.txt" 595#end 596#if (Typ=76) 597MySky (1) 598camera{ angle 36 location < 4.50, 3.00, -4.50> look_at< 0.10,-0.10, 0.00>} 599light_source{<-1500, 2500,-2500> color rgb<1,1,1>*0.8} // sun light 600light_source{< 4.50, 3.00,-4.50> color rgb<0.9,0.9,1>*0.1} // flash light 601object{ AxisXYZ_( 4.15, 2.45, 7.75, T_Dark, T_Light,30,-45, 0.75,0.75,1.15) scale 0.5} 602object{ Wire_Box(<-2.25,-2.0,-2.25>,<2.25, 2.00,2.25>, 0.03, 0) scale 0.5 texture{ pigment{ color rgb<1,1,1>*1.1}} } 603#include concat(In_Path,Txt_Path) // 76 - Hyperboloid_Y.txt" 604#end 605#if (Typ=77) 606MySky (1) 607camera{ angle 39 location < 2.50, 2.00, -5.50> look_at< 0.10,-0.10, 0.00>} 608light_source{<-1500, 2500,-2500> color rgb<1,1,1>*0.8} // sun light 609light_source{<2.50, 2.00, -5.50> color rgb<0.9,0.9,1>*0.1} // flash light 610object{ AxisXYZ_( 3.55, 2.45, 16.5, T_Dark, T_Light,10,-25, 0.75,0.75,1.35) scale 0.5} 611object{ Wire_Box(<-2.25,-2.25,-2.0>,<2.25, 2.25,2.0>, 0.03, 0) scale 0.5 texture{ pigment{ color rgb<1,1,1>*1.1}} } 612#include concat(In_Path,Txt_Path) // 77 - Hyperboloid_Z.txt" 613#end 614 615 616 617